home *** CD-ROM | disk | FTP | other *** search
/ Freelog Special Edition 10 / FreelogHS10.iso / Buzz / Buzz_Advanced_Pack.exe / {app} / Dev / Elak dist 2.cpp < prev    next >
C/C++ Source or Header  |  2001-08-27  |  4KB  |  296 lines
  1. /**
  2. * Elak Dist 2
  3. * crappy forms of distortion
  4. *
  5. * But hey, I listen to M÷torhead
  6. *
  7. **/
  8.  
  9. #include <string.h>
  10. #include <stdlib.h>
  11. #include <assert.h>
  12. #include <math.h>
  13. #include "../MachineInterface.h"
  14. #include <stdio.h>
  15.  
  16.  
  17. CMachineParameter const paraScatterInterval = 
  18. { 
  19.     pt_byte,                                        // type
  20.     "ScatterInt",
  21.     "Interval between scatters",                        // description
  22.     0,                                                // MinValue    
  23.     254,                                            // MaxValue
  24.     0xff,                                            // NoValue
  25.     MPF_STATE,                                        // Flags
  26.     0x200,
  27. };
  28.  
  29. CMachineParameter const paraScatterAmount = 
  30. { 
  31.     pt_word,                                        // type
  32.     "ScatterAmount",
  33.     "The level of the scattering",                        // description
  34.     1,                                                // MinValue    
  35.     0xfffe,                                            // MaxValue
  36.     0xffff,                                            // NoValue
  37.     MPF_STATE,                                        // Flags
  38.     0x200,
  39. };
  40.  
  41. CMachineParameter const paraKindOf = 
  42. { 
  43.     pt_byte,                                        // type
  44.     "KindOf",
  45.     "The kind of scattering",                        // description
  46.     1,                                                // MinValue    
  47.     3,                                                // MaxValue
  48.     0xfe,                                            // NoValue
  49.     MPF_STATE,                                        // Flags
  50.     0x200,
  51. };
  52.  
  53.  
  54. CMachineParameter const *pParameters[] = 
  55. { 
  56.     // global
  57.     ¶ScatterInterval,
  58.     ¶ScatterAmount,
  59.     ¶KindOf
  60.     
  61. };
  62.  
  63. CMachineAttribute const attrSymmetric = 
  64. {
  65.     "Symmetric",
  66.     0,
  67.     1,
  68.     0
  69. };
  70. CMachineAttribute const *pAttributes[] = 
  71. {
  72.     &attrSymmetric
  73. };
  74.  
  75. #pragma pack(1)        
  76.  
  77. class gvals
  78. {
  79. public:
  80.     byte scatterInterval;
  81.     word scatterAmount;
  82.     byte kindOf;
  83. };
  84. class avals
  85. {
  86. public:
  87.     int symmetric;
  88. };
  89.  
  90.  
  91. #pragma pack()
  92.  
  93. CMachineInfo const MacInfo = 
  94. {
  95.     MT_EFFECT,                                // type
  96.     MI_VERSION,    
  97.     0,                                        // flags
  98.     0,                                        // min tracks
  99.     0,                                        // max tracks
  100.     3,                                        // numGlobalParameters
  101.     0,                                        // numTrackParameters
  102.     pParameters,
  103.     0,
  104.     NULL,
  105. #ifdef _DEBUG
  106.     "Elak Dist 2(Debug build)",        // name
  107. #else
  108.     "Elak Dist 2",                    // name
  109. #endif
  110.     "ElakDist2",                                    // short name
  111.     "Johan Larsby",                        // author
  112.     NULL
  113. };
  114.  
  115.  
  116. class mi : public CMachineInterface
  117. {
  118. public:
  119.     mi();
  120.     virtual ~mi();
  121.  
  122.     virtual void Init(CMachineDataInput * const pi);
  123.     virtual void Tick();
  124.     virtual bool mi::Work(float *psamples,int numsamples, int const mode);
  125.  
  126.     
  127.  
  128. private:
  129.  
  130.     byte ScatterInterval;
  131.     word ScatterAmount;
  132.     byte  KindOf;
  133.  
  134.     word count;
  135.     word mR;
  136.     word mR2;
  137.  
  138.     gvals gval;
  139. //    avals aval;
  140.  
  141. };
  142.  
  143. DLL_EXPORTS
  144.  
  145. mi::mi()
  146. {
  147.     GlobalVals = &gval;
  148.     AttrVals = NULL;
  149. }
  150.  
  151. mi::~mi()
  152. {
  153. }
  154.  
  155. void mi::Init(CMachineDataInput * const pi)
  156. {
  157.     ScatterInterval = 1;
  158.     ScatterAmount = 1;
  159.     KindOf = 1;
  160.     count = 0;
  161.  
  162.  
  163. }
  164.  
  165. void mi::Tick()
  166. {
  167.  
  168.         if (gval.scatterInterval != paraScatterInterval.NoValue)
  169.         ScatterInterval = (gval.scatterInterval);
  170.  
  171.         if (gval.scatterAmount != paraScatterAmount.NoValue)
  172.         ScatterAmount = (gval.scatterAmount);
  173.  
  174.         if (gval.kindOf!= paraKindOf.NoValue)
  175.         KindOf = (gval.kindOf);
  176. }
  177.  
  178.  
  179.  
  180. bool mi::Work(float *psamples, int numsamples, int const mode)
  181. {
  182.     if (mode == WM_WRITE) 
  183.         return false;
  184.  
  185.     if (mode == WM_NOIO) //
  186.         return false;
  187.  
  188.     if (mode == WM_READ)
  189.         return true;
  190.  
  191.  
  192.  
  193.     if (KindOf == 1)
  194.     {
  195.         do 
  196.         {
  197.             double const s = *psamples;
  198.     
  199.                 if (count > ScatterInterval)
  200.                 {
  201.                     count =0;
  202.                     mR = rand()%(ScatterAmount);
  203.                     *psamples = mR ;
  204.                 }
  205.     
  206.                 count ++;
  207.  
  208.                 if (s >= 65534)
  209.                     *psamples = 65534;
  210.                 else if (s <= -65534)
  211.                     *psamples = -65534;
  212.  
  213.                 psamples++;
  214.  
  215.             
  216.         } while(--numsamples);
  217.     }
  218.  
  219.  
  220.     else if (KindOf == 2)
  221.     {
  222.         do 
  223.         {
  224.             double const s = *psamples;
  225.     
  226.                 if (count > ScatterInterval)
  227.                 {
  228.                     count =0;
  229.                     mR = rand()%(ScatterAmount);
  230.                     mR2 = rand()%(2);
  231.                     if (mR2==2)
  232.                     {
  233.                         *psamples = (*psamples + mR)/2 ;
  234.                     }
  235.                     else
  236.                     {
  237.                         *psamples = (*psamples - mR)/2 ;
  238.                     }
  239.  
  240.  
  241.                 }
  242.     
  243.                 count ++;
  244.  
  245.                 if (s >= 65534)
  246.                     *psamples = 65534;
  247.                 else if (s <= -65534)
  248.                     *psamples = -65534;
  249.  
  250.                 psamples++;
  251.  
  252.             
  253.         } while(--numsamples);
  254.  
  255.     }
  256.  
  257.     else if (KindOf == 3)
  258.     {
  259.  
  260.                 {
  261.             double const s = *psamples;
  262.     
  263.                 if (count < ScatterInterval/2)
  264.                 {
  265.                     count =0;
  266.                     mR = rand()%(ScatterAmount);
  267.                     if (s >= 0)
  268.                     {
  269.                         *psamples =- *psamples  ;
  270.                     }
  271.                     else
  272.                     {
  273.                         *psamples =+ *psamples ;        
  274.                     }
  275.  
  276.                 }
  277.     
  278.                 count ++;
  279.  
  280.                 if (s >= 65534)
  281.                     *psamples = 65534;
  282.                 else if (s <= -65534)
  283.                     *psamples = -65534;
  284.  
  285.                 psamples++;
  286.  
  287.             
  288.         } while(--numsamples);
  289.  
  290.     }
  291.  
  292.     return true;
  293. }
  294.  
  295.  
  296.